home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 3 / BBS in a box - Trilogy III.iso / Files / Util / L / LaserWriter Pro EnergySW / LaserWriter Utility / LaserWriter Utility.rsrc / TEXT_1006.txt < prev    next >
Encoding:
Text File  |  1993-04-19  |  946 b   |  1 lines
  1. /classBTest{save statusdict/product get(LaserWriter)anchorsearch exch pop{dup length 0 eq{pop 1}{( Plus)eq{2}{3}ifelse}ifelse}{0}ifelse dup 1 ne exch 2 ne and false <b2141b454416935af37a7aaa0da9c65dc132b2769a52440afe20a0cbebb10165dd489cfea1d364af8c057775a06614ecf9e854768266a93ceba928c4b99fdd5901ac5017c6924439ddfdde5a3d2320213ad0e7bed9f6d9584d8d366f97ce8b329c8ad68dd069c712530e3fec4a44ecb416b5a972f60f9392b77f99b19b747ec8911c49fcbe0a84ebbeafc9ab5cfeea6fb158a765d07fefa2738c3fee54c71fae54bce3bfb575801b442350e1fcf39ff41e73cf98b04d560cb39ec9e0407484ff349706>{eexec}stopped{dup type/stringtype eq{pop}if}if and exch restore{vmstatus 3 -1 roll pop exch sub 120000 ge {(classB) =}{(lowMemClassB) =} ifelse}{(classC) =} ifelse} bind def userdict/type42known known not{userdict/type42known systemdict/resourcestatus known{42/FontType resourcestatus {pop pop true}{false}ifelse}{false}ifelse put}if userdict/type42known get{(classA)=}{classBTest}ifelse